/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '87 / Utilities ƒ / Sizer 1.0 / Sizer 1.0.rsrc / SCOT_1_Terry

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 00 01 20 0c 57 69 6e | 64 6f 77 20 53 69 7a 65 |... .Win|dow Size|
|00000010| 72 00 3e 20 57 49 4e 44 | 4f 57 20 53 49 5a 45 52 |r.> WIND|OW SIZER|
|00000020| 20 69 73 20 61 20 62 61 | 72 65 2d 62 6f 6e 65 73 | is a ba|re-bones|
|00000030| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 72 65 6e | applica|tion ren|
|00000040| 64 65 72 65 64 20 69 6e | 20 61 20 66 69 74 20 6f |dered in| a fit o|
|00000050| 66 00 3b 20 64 65 73 70 | 65 72 61 74 69 6f 6e 20 |f.; desp|eration |
|00000060| 77 68 69 6c 65 20 66 72 | 61 6e 74 69 63 61 6c 6c |while fr|anticall|
|00000070| 79 20 67 6f 69 6e 67 20 | 62 61 63 6b 20 61 6e 64 |y going |back and|
|00000080| 20 66 6f 72 74 68 20 62 | 65 74 77 65 65 6e 3d 20 | forth b|etween= |
|00000090| 72 75 6e 73 2f 63 6f 6d | 70 69 6c 65 73 20 61 6e |runs/com|piles an|
|000000a0| 64 20 6e 65 76 65 72 20 | 71 75 69 74 65 20 63 6f |d never |quite co|
|000000b0| 6d 6d 69 6e 67 20 75 70 | 20 77 69 74 68 20 74 68 |mming up| with th|
|000000c0| 65 20 72 69 67 68 74 20 | 73 69 7a 65 41 20 77 69 |e right |sizeA wi|
|000000d0| 6e 64 6f 77 2e 20 41 20 | 66 65 77 20 74 68 69 6e |ndow. A |few thin|
|000000e0| 67 73 20 74 6f 20 62 65 | 61 72 20 69 6e 20 6d 69 |gs to be|ar in mi|
|000000f0| 6e 64 3a 20 31 29 20 54 | 68 69 73 20 70 72 6f 67 |nd: 1) T|his prog|
|00000100| 72 61 6d 20 69 73 20 66 | 6f 75 6e 64 65 64 41 20 |ram is f|oundedA |
|00000110| 6f 6e 20 74 68 65 20 63 | 6f 6e 63 65 70 74 20 74 |on the c|oncept t|
|00000120| 68 61 74 20 74 68 65 20 | 75 70 70 65 72 20 6c 65 |hat the |upper le|
|00000130| 66 74 20 63 6f 72 6e 65 | 72 20 6f 66 20 74 68 65 |ft corne|r of the|
|00000140| 20 4d 61 63 20 69 73 20 | 27 28 30 2c 30 29 27 2e | Mac is |'(0,0)'.|
|00000150| 11 20 32 29 20 49 66 20 | 79 6f 75 20 65 6e 74 65 |. 2) If |you ente|
|00000160| 72 20 2b 20 6f 72 20 61 | 20 6e 6f 6e 2d 6e 75 6d |r + or a| non-num|
|00000170| 62 65 72 20 74 68 65 20 | 70 72 6f 67 72 61 6d 20 |ber the |program |
|00000180| 77 69 6c 6c 20 74 68 72 | 6f 77 20 79 6f 75 3e 20 |will thr|ow you> |
|00000190| 62 61 63 6b 20 74 6f 20 | 74 68 65 20 66 69 6e 64 |back to |the find|
|000001a0| 65 72 20 69 6e 20 64 69 | 73 67 75 73 74 2e 2e 2e |er in di|sgust...|
|000001b0| 6f 72 20 77 68 65 6e 20 | 79 6f 75 20 62 65 63 6f |or when |you beco|
|000001c0| 6d 65 20 64 69 73 67 75 | 73 74 65 64 20 00 3a 20 |me disgu|sted .: |
|000001d0| 77 69 74 68 20 74 68 65 | 20 70 72 6f 67 72 61 6d |with the| program|
|000001e0| 2c 20 74 68 61 74 27 73 | 20 68 6f 77 20 79 6f 75 |, that's| how you|
|000001f0| 20 65 78 69 74 2e 20 33 | 29 20 49 66 20 74 68 65 | exit. 3|) If the|
|00000200| 20 70 72 6f 67 72 61 6d | 20 00 38 20 6c 69 74 65 | program| .8 lite|
|00000210| 72 61 6c 6c 79 27 64 72 | 61 77 73 20 61 20 62 6c |rally'dr|aws a bl|
|00000220| 61 6e 6b 27 2c 20 6b 65 | 65 70 20 68 69 74 74 69 |ank', ke|ep hitti|
|00000230| 6e 67 20 72 65 74 75 72 | 6e 20 74 6f 20 67 65 74 |ng retur|n to get|
|00000240| 20 61 20 00 40 20 63 6f | 6f 72 64 69 6e 61 74 65 | a .@ co|ordinate|
|00000250| 20 71 75 65 73 74 69 6f | 6e 20 77 69 6e 64 6f 77 | questio|n window|
|00000260| 20 62 61 63 6b 2c 20 74 | 68 65 6e 20 6b 65 65 70 | back, t|hen keep|
|00000270| 20 67 6f 69 6e 67 20 6f | 72 20 68 69 74 20 72 65 | going o|r hit re|
|00000280| 74 75 72 6e 20 2c 41 20 | 74 6f 20 65 78 69 74 2e |turn ,A |to exit.|
|00000290| 20 34 29 20 57 68 61 74 | 20 74 68 65 20 68 65 63 | 4) What| the hec|
|000002a0| 6b 20 69 73 20 69 74 20 | 61 62 6f 75 74 20 74 68 |k is it |about th|
|000002b0| 69 73 20 70 72 6f 67 72 | 61 6d 20 74 68 61 74 20 |is progr|am that |
|000002c0| 74 61 6b 65 73 20 75 70 | 3e 20 33 36 2b 4b 3f 20 |takes up|> 36+K? |
|000002d0| 43 6f 6d 70 69 6c 65 64 | 20 5a 42 61 73 69 63 2e |Compiled| ZBasic.|
|000002e0| 2e 2e 63 68 65 63 6b 20 | 6f 75 74 20 53 49 5a 2e |..check |out SIZ.|
|000002f0| 42 41 53 20 66 6f 72 20 | 74 68 65 20 6c 69 67 68 |BAS for |the ligh|
|00000300| 74 77 65 69 67 68 74 ba | 41 20 28 73 6f 75 72 63 |tweight.|A (sourc|
|00000310| 65 20 63 6f 64 65 29 20 | 76 65 72 73 69 6f 6e 2e |e code) |version.|
|00000320| 20 4d 6f 72 65 20 66 6c | 65 78 69 62 6c 65 2c 20 | More fl|exible, |
|00000330| 4d 61 63 69 73 68 20 76 | 65 72 73 69 6f 6e 73 20 |Macish v|ersions |
|00000340| 74 6f 20 66 6f 6c 6c 6f | 77 2e 37 20 44 6f 20 77 |to follo|w.7 Do w|
|00000350| 69 74 68 20 6f 72 20 6d | 61 6e 69 70 75 6c 61 74 |ith or m|anipulat|
|00000360| 65 20 74 68 69 73 20 70 | 72 6f 67 72 61 6d 20 68 |e this p|rogram h|
|00000370| 6f 77 65 76 65 72 20 79 | 6f 75 20 6c 69 6b 65 2e |owever y|ou like.|
|00000380| 2e 2e 38 20 51 75 65 73 | 74 69 6f 6e 73 2c 20 63 |..8 Ques|tions, c|
|00000390| 6f 6d 6d 65 6e 74 73 20 | 61 6e 64 20 73 6c 75 72 |omments |and slur|
|000003a0| 72 73 20 74 6f 20 41 4c | 20 53 50 4f 48 4e 20 28 |rs to AL| SPOHN (|
|000003b0| 37 35 32 32 36 2c 33 34 | 33 35 29 00 17 3c 52 45 |75226,34|35)..<RE|
|000003c0| 54 55 52 4e 3e 20 74 6f | 20 63 6f 6e 74 69 6e 75 |TURN> to| continu|
|000003d0| 65 2e 2e 2e 01 20 0c 49 | 4e 50 55 54 20 57 49 4e |e.... .I|NPUT WIN|
|000003e0| 44 4f 57 00 28 45 6e 74 | 65 72 20 74 68 65 20 58 |DOW.(Ent|er the X|
|000003f0| 31 20 63 6f 6f 72 64 69 | 6e 61 74 65 20 6f 66 20 |1 coordi|nate of |
|00000400| 79 6f 75 72 20 77 69 6e | 64 6f 77 3a 20 00 28 45 |your win|dow: .(E|
|00000410| 6e 74 65 72 20 74 68 65 | 20 59 31 20 63 6f 6f 72 |nter the| Y1 coor|
|00000420| 64 69 6e 61 74 65 20 6f | 66 20 79 6f 75 72 20 77 |dinate o|f your w|
|00000430| 69 6e 64 6f 77 3a 20 00 | 28 45 6e 74 65 72 20 74 |indow: .|(Enter t|
|00000440| 68 65 20 58 32 20 63 6f | 6f 72 64 69 6e 61 74 65 |he X2 co|ordinate|
|00000450| 20 6f 66 20 79 6f 75 72 | 20 77 69 6e 64 6f 77 3a | of your| window:|
|00000460| 20 00 28 45 6e 74 65 72 | 20 74 68 65 20 59 32 20 | .(Enter| the Y2 |
|00000470| 63 6f 6f 72 64 69 6e 61 | 74 65 20 6f 66 20 79 6f |coordina|te of yo|
|00000480| 75 72 20 77 69 6e 64 6f | 77 3a 20 00 0b 54 65 73 |ur windo|w: ..Tes|
|00000490| 74 20 57 69 6e 64 6f 77 | 06 59 31 20 69 73 20 00 |t Window|.Y1 is .|
|000004a0| 06 59 31 20 69 73 20 9a | 06 58 32 20 69 73 20 00 |.Y1 is .|.X2 is .|
|000004b0| 06 59 32 20 69 73 20 00 | 1e 43 61 72 72 69 61 67 |.Y2 is .|.Carriag|
|000004c0| 65 20 72 65 74 75 72 6e | 20 74 6f 20 63 6f 6e 74 |e return| to cont|
|000004d0| 69 6e 75 65 2e 2e 2e 00 |                         |inue....|        |
+--------+-------------------------+-------------------------+--------+--------+